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Well hoiu did ike go mtU that msh list called for in October's editorial? Not very uteiiT is the short ansiner. You 
may recall that we offered sotrie suggestions for content of this newsletter and sought your "'jiish list" of just what 
you wanted to see. I iBust say that the number of replies did not prompt [Tie to visit the local hardware store for a 
larger iiiail box. There was one response though^ by way of a note added to a subscription renewal, which I will 
repeat for you. 'More C, less Easic09'. Do you agree? 

On a more encouraging note however^ we are happy to report that membership of this User Group has grown to forty- 
seven (47) which includes a number of renewals^ and some new members. To those members who have renewed we offer 
our sincere thanks for your continued support, and to those members who have joined this year we say WELCOME and 
hope that you find something of interest in each coming edition. 

Just as a of matter interest, the membership last year reached a total of seventy-four , which we were very pleased 
with. Some of these members who have not renewed for this current subscription year were good enough to write and 
advise that they have made a change to other systems, for a variety of reasons. It seems that in spite of the lack 
of support by Intertan of both CoCo and OS-9, and their decision to drop the CoCo completely, there is still a good 
deal of interest in OS-9 by owners of this powerful little computer. The OS-9 operating system is widely used on 
the world scene for a variety of applications, and of course runs on a variety of hardware including computers 
supported by 03-9 63K. It may well be that we will change our computer system at some time in the future and toss 
out OS-9 for MS DOS. Perish the thought! 

Although this newsletter reaches only the converted, or dedicated 0S9ers, we feel that our efforts can only help to 
maintain interest in this great operating system, and we hope to present articles and news about all 
implementations of OS-9. Therefore we do need material from all memDers, at all levels of experience, in order 
that each of us can learn something from these pages. 

New, I must confess to not following all our newsletter articles with the enthusiasm each author might hope for. 
At a local user group meeting during October, Don Berrie asked "Who has tried the Macro facilities of EDIT covered 
in the October newsletter?" Much to Don's disappointment, I had to say that I had not tried to use what he had 
covered in his article. How about you? I did, however, compile the Database in C by Bob Devries, and learnt a 
few things along the way. The instructions that Bob presented looked foolproof, but then he was probably not 
counting on somebody like me who jumped in with C compiler in hand and little reference to the instructions. This 
sounds very familiar doesn't it? Anyway, after a couple of 'unconditional abort' errors, and a little reading of 
the instructions, success was mine. If you have any problems with compiling the code presented in the series I am 
sure that Bob would be happy to help, but take it from me that all is in the instructions. 

You will all know that the process of learning requires some help from others, but most of all it requires some 
effort by you, so please make the effort to help yourself and to help others. The fundamental aim of this 
newsletter, after all, is just to help each other. 

This is not news, I hear you say, we already know all that. May I suggest then, that to stop me from continually 
pleading for articles and feedback, YOU send something to us. We want to publish your article, hint, tip, question 
or comment. So here is a challenge to every member to spend 41 cents and mail something for our next edition, 
which will be February 1990, We don't need a masterpiece (they are few and far between) we do need at least a 
comment from everybody. 

We wish a Merry Christmas to all members, and trust that the new year brings to all, health, happiness and 
prosperity. Bob, Don & Gordon. 
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LINEATER 

An OSK Basic programrte by David Eaton. 

OS9_6809 version by Bob Devries, 

Here's a little programirie froih one of our 68000 0S9 users. The prograiriffle simply shows how screen accessing 
is done on the ATARI version of 059, and could be made the basis of a learn-to-spell type prograirime, I have made 
the necessary changes and provided the CoCo version. It would be relatively easy to add to this piece of code to 
make it into a spelling programme. The speed of printing and erasing the characters on the screen can be changed by 
altering the FOR-NEXT loop variable y, which is currently set at 3000, An interesting point about the two different 
versions, is that they both run at the same speed, even though the ATARI computer runs at a much higher speed. 
I hope one of our readers mill take up the challenge to write a programme around this small piece, for the benefit 
of others in our group. Below are the two listings, first the OSK (ATARI) version, then the 0S9 (CoCo) version. 

Regards. . , Bob Devr ies. 
PROCEDURE iineater 

8008 (* When using, replace 'DIM ab' with 'PARAM ab' *) 

0034 (* A word or sentence is shown for a short time and then eaten *) 

0073 (* Version TDE 1.2 *) 

0090 (* Adapted from programme in Nibble Vol. 2. No. 3 *) 

00C6 DIM ab:5TRIN6[60] 

08DC DIM >;,y,length:INTEGER 

00F4 PRINT CHR$\27); "E" 

0106 PRINT 'Enter the message you wish to show for a short time ' 

0142 PRINT \ PRINT 

014A INPUT ab 

0152 PRINT CHR$(27); '£' 

0164 PRINT CHR$(27); 'V"; CHR$(44); CHR$(50); 

01BC PRINT ab 

0194 iength=LEN(ab) 

01A2 FOR y-\ TO 20000\ NEXT >; 

01D4 FOR );=length TO STEP -1 

01FE PRINT CHR$(27); "V; CHR$<44); CHR$(50+>;); " "J 

0232 FOR y=l TO 3000\ NEXT y 

0264 NEXT >; 

0276 PRINT 

027A END 

PROCEDURE Iineater 

0000 (* When using, replace 'DIM AB' with 'PARAM AB' 

002F (* A word or sentence is shown for a short time and then 'eaten' ' 

006F <* Version TDE 1.2 (adapted for CoCo Ba5ic09 by Bob Devries) 

00AB (* Adapted from a programme in 'Nibble' Vol 2 No 3 

00DD DIM AB:STRIN5i:60] 

00E9 DIM x,y,length:INTE5ER 

00FS PRINT CHR$(12) 

00FD PRINT "Enter message you wish to show for a short time ' 

0131 PRINT \ PRINT 

8135 INPUT AB 

013A PRINT mmii) 

013F PRINT CHR$(2)i CHR$(50); CHR$(44); 

014D PRINT AB 

0152 length=LEN(AB) 

015B FOR >:=! TO 20000 \NEXT >; 

0177 FOR >;=length TO STEP -1 

018E PRINT CHR*(2); CHR$(50+>;)i CHR$(44); ' '; 

eiA4 FOR y=l TO 3000 \NEXT y 

01 C0 NEXT >; 

01 CE PRINT 

01 CD END 



Page 3 December 19^9 



AUSTRALIAN 0S9 NEWSLETTER 

Resistor Calculator, 
presented by Bob Devries. 

Here's a handy little prcgraffime to work out what parallel or series combination of resistors are needed to 
produce an odd value that is not in the normally available range of resistors. Very handy for ojhen you accidently 
connect your multi meter to the niains mith it still switched to the ohiTis scale. The resistors in that part of a 
multimeter are usually very odd values. 

This programnie came from 'Silicon Chip' magazine, and was Siintten by Steve Payor, who wrote it in GWEasic 
for an IBM PC. I converted it to Basic29 and made some minor cosmetic changes to it. So here is the code: 



PROCEDURE Resistor 



0000 


BASE 1 


0002 


DIM E12(35):REAL 


000E 


DIfl i, J, nearest: INTEGER 


S01D 


DIM res, Rh Rmin, Rma>!, tolerance: REAL 


0034 




0035 


PRINT CHR$(12) 


003A 


PRINT \ PRINT 


003E 


FOR 1=1 TO 35 


004E 


READ E12(i) 


0057 


NEXT 1 


0062 




0063 


LOOP 


0065 


PRINT "Input desired resistance (: 



INPUT res 

0095 IF res=0 THEN 

00A2 END 

•00A4 ENDIF 

00A6 PRINT "Input desired tolerance (7.) '; 

00C? INPUT tolerance 

00CC Rmin=res*U-tolerance/100) 

00E0 Rma;;-re5*(l+tolerdnc8/100) 

00F4 PRINT CHR$U2) 

00F9 PRINT \ PRINT 

00FD PRINT "Looking for a value betujeen M Rmmi ' and "; Rmax ; '.' 

0131 PRINT 

0133 PRINT 'Calculating...' 

0145 PRINT 

0147 nearest=25 

014E LOOP 

0150 EXITIF E12(ne3rest+l}>=res THEN 

0163 ENDEXIT 

0167 nearest=nearest+l 

0172 ENDLOOP 

0176 FOR i=nearest-24 TO nearest 

01SB FOR j=nearest-24 TO i 

01A0 Rl=E12(i)+E12(j) 

01E2 IF Rl>Rmin AND Rl<R!iia>; THEN 

01C7 PRINT USING 'R7.2'iE12(i) ; \ PRINT ' and "; 

01E2 PRINT USING 'R7.2"iE12<j); \ PRINT ' in series, ' ; 

0206 PRINT USING 'R4.r, (Rl/res-l)*100; 

0220 PRINT '7.' 

0225 ENDIF 

0227 NEXT J 

0232 NEXT i 
023D 

023E FOR i=neare5t+l TO neare5t+25 
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and '; 

in parallel, 



0256 FOR J=neare5t+1 TO i 

Gt26E Rl=l/(1/E12(i)+1/E12(j)) 

B289 IF RDRmin AND RKRmax THEN 

029E PRINT USING ■R7.2SE12(i); \ PRINT 

B2E9 PRINT USING "R7.2%E12(j) ; \ PRINT 

02DD PRINT USING "R4.r, (Rl/re5-l)*10e; 

B2F7 PRINT 'V 

02FC ENDIF 

02FE NEXT j 

0309 NEXT i 

0314 PRINT \ PRINT "Search complete." 

032A PRINT 

B32C ENDLOOP 

0330 DATA .0U. 012,. 015,. 01B,. 022^.027,. 033,. 039,. 047,. 056,. 063,. 082 

0388 DATA .l,.i2,,15,.18,.22,.27,.33, .39,.47, .56,.6S,.S2 

03E0 DATA 1,1. 2, 1.5, 1.8,2. 2, 2.7, 3.3,3.9,4. 7,5.6,6.3,8.2 

0434 DATA 10,12,15,18,22,27,33,39,47,56,63,62 

045C DATA 100,120,150,180,220,270,330,390,470,560,630,820 

04S£ DATA 1000,1200,1500,1800,2200,2700,3300,3900,4700,5600,6800,8200 

04EF DATA 10000, 12000,15000, 18000,22000,27000,33000. ,39000. ,47000. ,560S0. ,68000. ,82000. 

0505 DATA 1000000. 



As u5Udl, the listing i5 from Ea5ic09'E. LIST comjTiand 50 that you can check for errors in the lines by 
coufparing the psuedo line numberB {actually nu.iiber of bytes from the start). Have fun niith it, and I hope it tiiill 
get you out of trouble sometime. 

Regards, 
Bob Devries. 

ddddooooodOOOOOOOOOOggoddooooo 



CoCo Horizon 

A new colour computer magazine is about to be released here in sunny Queensland' 

Its name iiiill be CoCo Horizon. It uiiil probably be published on a monthly basis (depending on subscriptions and 
authors) and uiill cost appro); imateiy $3.00 per issue. It is hoped that the first issue mill be available sometipc- 
in January 1990. 



Readers tuho are interested in supporting this venture should contact 



Andreu! hcQuirk 
10 Deborah Court, 

Slack's Creek. 
Queensland. 4127. 
Phone: 07 2082966 



OOOOOOOOOOOOOOOOOOOOOOOOOOODDD 
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THE FUTURE OF THE C0C03 
A "PhilosophicaT vieiupoint by Nickolas Marente? 



THE FOLLOWING ARTICLE 13 BASED ON HY OWN OBSERVATIONS OF THE C0l03 MARKET AND COMPUTER INDUSTRY WORLDWIDE. I HAVE 
NOT BEEN IN CONTACT WITH TANDY CORPORATION FOR ANY OF THE INFORMATION OUTLINED IN THIS ARTICLE. FEEDBACK TO THIS 
ARTICLE IS QUITE WELCOME AND SHOULD BE DIRECTED TO COCO-LINK MAGAZINE. 

Anyone who owns a CoCd3 lUDuid surely be deeply disappDirited by the recent "chop" of the CdCo3 by InterTan. 
U as one luho has spent many hours developing softiuare and hardware for it am more so. But I do believe that there 
are two sides to this. The side we are all fairiiliar withi that Tandy has pulled the rug on its loyal CoCo3 
customers. The other side is that this is the way the fiiarket is heading. Before going into [Tiore details, lets look 
at the CoCo3 market prior to the 'tragedy'. Let's look further than just our little confined CoCo3 world and see 
what's happening in the rest of the computer world. 

Commodore are on the verge of chopping the C-64 and C-128. A C-64 with a disk drive retails for around the 
56S0 mark. Anyone wanting to spend this much money on a computer which they will primarily be playing games on may 
as well fork out the extra $300 and get an Amiga 500 pack giving theiTt 5r2K of Ram» 330K high speed drives^ 4096 
color graphics, stereo sound and access to fantastic software. Anyone buying a C-64 solely for games may as well 
spend only $200 for a Nintendo games console and be done with slow loading procedures. 

Someone who is not interested in just playing games but wants to do some serious computing will generally 
spend a bit more to get a more powerful computer. 

What I am trying to highlight here is that the low end computer market is dividing into two distinct areas. 
The first is the very low end game playing market. The other is ttie upper-low end computer enthusiast (play-the- 
occasional-game) market. The very low end market is heading towards the games console area. If games is all they 
want, then games is all they need. No need to know about keyboard commands, loading procedures, programming 
languages etc., just slap a cartridge m and play. Games consoles are cheaper to produce and therefore cheaper to 
buy and to many, a low price is the right price. 

The upper-low end user wants big power for lower bucks. Half a meg, one meg and eight meg of Ram. A fast 16 
bit processor and fast hardrives if the money can reach that far. They want a large and varied software base. IBM 
compatability is a big thing because it brings many users together. Software developers love it because it means 
more customers, computer developers love it for the same reason. 

The CoCo3 as many other computers of the era, fall mid way between these to areas. It plays games for a 
reasonably low cost but can be e>;panded to run powerful operating systems. Customer demands nowadays are more 
specific. For one who jCist wants a games unit, the CoCo is expensive and the variety of games is small. For one who 
wants a power system, the CoCo needs to be expanded. By the time a CoCo is equipped with a disk drive, j12K Ram, 
operating system and RGB monitor, it isn't too much cheaper than a PC, Amiga or Atari ST system. This is exactly 
the same problem that the C-64 and C-128 face (although the C-64 market has more momentum than the CoCo market and 
will stay around a little longer). 

Well, we see that the CdCo3 is without a solid market area and in this light, we can understand why 
InterTan have given it the chop. Enough of the grim facts and let's look at what the future holds. 

If Tandy were to do a CoCo4, what shape or form must it take to recapture a market position. From the last 
few paragraphs, we can conclude that it must either go upmarket by adding extra memory, built in drives, be faster 
and more professional and make OS-9 the standard operating system OR go down market and make it into a games 
console. 

The upmarket approach would fail before it even started. Many companies have tried to go their own way, 
avoiding the IBM PC standard. Most of these companies are not heard of anymore. The IBM standard is a big standard. 
Commodore, Atari, Amstrad even Tandy have seen this. All these companies have gone IBM compatible. Commodore and 
Atari have continued their quest with their own standard and have achieved reasonable success but the IBM standard 
still dominates. The CoCo would not have a chance and even if it did, it would be too big a risk for a company like 
Tandy to take on. 
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The future of the CoCo3 is in the gatries console area. Now before you start siDearing and make stateuients 
like "I don't luant a games coniputer!"! let uie e):plain houi I (if I ms in charge of Tandy) would go about a CoCo4. 

kiagine a bo>: which has a cartridge slot in the top for game packs^ connectors in the side to take two (or 
four!) joysticks! several buttons for selecting and starting games and video connectors at the back for a standard 
TV and RGB monitor. This would be the Tandy CoCo game console unit. It would basically be a CoCo3 with no keyboard^ 
no BASIC ROMi 126K RAM plus a 3 channel sound chip (as used in many games consoles). This would be cheap to produce 
and low cost to buy. Now what if this boM also had a duplicate cartridge connector as used in the CoCo3 but placed 
at the back of the unit. What if it also had a connector at the front of the unit marked "keyboard". Tandy could 
sell an add-on kit consisting of an E>;tended Color Basic Rom cartridge and separate detachable keyboard which when 
plugged into the "bo>:" transforms it into a CoCo3! Bring out a new (or re-introduce the old) disk drive unit with 



Now let's get really creative! How about also offering an OS-9 Level 2 ROM cartridge "! Maybe even with 
Multi-Vue!Il! 

I feel that this design would keep e>;i£tin5 CoCo owners very happy and will bring together a lot more CoCo 
users. Users who first bought the systen; as a games console and later decided to upgrade it to a computer and enter 
the world of CoCo computing! The more i think about it the more great ideas I come up with! 

Weill time to get off my soap box and return to the real world of gloom where the only thing that keeps us 
going is the hope that the CoCoA become reality. 

THIS ARTICLE IS BEING SENT TO TANDY CORPORATION IN FORT WORTH TEXAS IN THE HOPE THAT THEIR ENGINEERS AND MARKETING 
DEPARTMENTS ARE * STIMULATED". 

ODOOOOOODOOOOOOOOOOOOOOOOOOODO 

Let's Clear the Slate, 

3 Different Ways. 

by Bob Devries and Don Eerrie, 

I'll bet many of you have cursed 0S9 for not having a CLS in its repetoire of available commands. Well, here are 
now three different versions for you to look at and use. They ail do the same thing, that is, send to the screen 
the code(s) necessary to clear it. 

While Don and I \LieT5 discussing another programme used in this newsletter, Don showed me a CLS command which he had 
written for his ATARI 520 with OS9/6S000. He had written it in 'C\ and it was an astounding A698 bytes long ! I 
said to him that I thought we should write one in 63030 assembler. There was only one snag. Neither of us is on 
speaking terms with 6BK assembly language, even though both of have a computer with that CPU in it. 

We did some investigation and experimentation, and after some in depth study of the manuals, we came up with the 
programme below. Also shown &re two different versions for OS9/6S09, one for the RMA and RLINK programmes, and one 
for ASM. Of course, the 68K version is compiled with R6B and linked with LtS. 

Here's the source code for 68000/059 

nam els 

Edition equ 1 first edition 

typelan set (Prgrm<<8)+0bjct set program type and language 

attrev set (ReEnt<<8)+l set attributes end revision 

* ne>:t comes the programme section 

psect els, typelan, attrev, Edition, 0, start 

use /h0/defs/systype.d definitions files to use 
use /h0/defs/Dskdefs.d 
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* next 15 the initialised data and stack area 
vsect 
ds.b 255 
ends 



start 11(0 veq #l»d0 

moveq #2Tdl 

lea clsci[id(pc),a0 

Ds9 I$Write 

moveq #0idl 

OS? F$E>;it 
clsaid dc.b 27,69 

ends 



select stdout 

printing tiuo chars 

point to chars to print 

do write coirimand 

clear the error nuiriber 

and e>;it 

$1B,$4j clears the screen on ATARI 0S9/63K 

end of prograiTfiTte 



To asseiTible this, ue used the following command lines:- 

R68 els. a -o=/R0/ci5.Q 

L68 cls.o -l=/H0/LIB/sy5lib.l -o=/R0/cls 

This resulted in the binary file 'els' to be stored in the raiTidisk, a mere 116 bytes. Because of its length 
iQT lack of it)) it loads much more quickly than the C version, and also works more quickly. 

Here is the OS9/6809 version for the RMA assembler and RLINK linker, 

nam Cls 
Edition equ 1 
Prgrm equ 16 
Objct equ 1 
ReEnt equ 12S 

typelan set Prgrm+Objct 
attrev set ReEnt+1 

psect Cls, typelan t at trev, edit ion, 0t start 

use /Dl/LIB/os9d8f5.a 





vsect 








rmb 255 








endsect 






start 


Ida #$01 




select stdout 




Idy #$0001 




print one char 




lesx clscmd. 


per 


point to char to print 




os9 I$Write 




go print it 




clrb 




clear error if any 




059 F$E>:it 




and exit 


clscmd 


fcb 12 




$0C clears the screen on CoCo 




endsect 




end of programme 



Assembly is done like thisJ- 

RMA cls.a -1 -o=/R0/cl5.o 

RLINK cls.o -l=/Dl/LIB/sy5.1 -o=/R0/cls 
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Notii here's the cede for those of you mith 0S9 Level One, or those who don't have the RHA asserribler. You'll 
notice that the code is uiritten differently xo the previous tuo. 

nam Cls 

ifpl 

use /dd/defs/059defs 

endc 

Edition equ 1 

Type! an set Prgrin+Objct 

Attrev set ReEnt+1 

ffiod CisEnd»ClsNarThtypelanTattrevT5tart,ClsDat 

ClsNdffi fcs /Cls/ 
fcb 1 

riTfb 25 J 

ClsDat equ . the period in this line nsust not be left out 

start Ida #$S1 

Idy #$0001 

leax ClsCmdTPcr 

Ds9 I$Write 

clrb 

059 F$E>:it 
ClsCmd fcb 12 

emod 
ClsEnd equ * asterisk here iufportant! 

To asseiTible this version the corruriand line is like thisi- 

ASM cis.a l,o=/R3/cl5 #12k 

Note the #12K here is necessary else the assembler quits yith syntbol table full error. 

Weill there you have it. You'll notice that in all the e>j atrip les I've used the R0 raindisk as my tetrjporary 
storage. You inay of course use any drive and directory. This cofTfirtent also applies to the pathlist for the libraries 
and other definitions files. You'll need to change them to suit your system. For example, in the last version, I 
used '/DD' as the drive specifier, which is the correct way for 0S9 level two, and denotes the 'default drive' 
(read the article about that elsewhere in this issue), you may change that to /D0 or /Dl or whatever to suit the 
situation. 

For those of you who are using the Cls programme which appeared in 'The Rainbow' of November 1986 page 204, 
there a-r9 two errors in the source code. The first one in line IS, is not fatal, and is rectified by replacing the 
'i^' with a '.'. The second error causes the programme to modify itself, which is, of course, quite illegal in 0S9. 
To change this change line 22 to read ... leax char,u ... not *pcr as it is now. This also results in the code 
being two bytes shorter. 

Well, have fun with that, 0S9 level two users may want to include this command with the 'Shell' so that it 
will always be in memory. 

Regards, 
Don Eerrie 
Bob Devries 
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An explanation on mindc^'E. for your systeni disk 
by Rob Unsiiiorth 

What I aiTi going to do is explain how to configure uindoius for your systenj disk, Windoms that are loaded unth 
your boot file and do not require increate or display sequences in your startup file. 

The listing below is a copy of the startup file kihich was being used by one of user group friembers^ who gave 
a copy of his systeiTi disk to a new member^ and I UavE since noticed a third member with the same problem. Now you 
know why I am writing this article. 

iniz r0 

* start system time from keyboard 

set i me </l 

format /r0 </l 

iniz wl 

iniz w2 

miz w7 

wcreate /wl -E=fi2 8 13 BiS 24 00 01 01 

wcreate /w2 -5=02 63 24 62 07 07 

wcreate /w7 -s=02 E SS 24 05 82 02 

shell i=/wl& 

shell i=/w2ii 

shell i=/w7& 

dates 
As you can see wl, w2, and w7 are going to be aveiieble to the user each time the system is booted. These 
three windows are being loaded in with the boot filei probably with the default descriptors that came with the 
system master disk. As the windows are what we are discussing here I will only refer to that part of the startup 
file which relates to windows. 

The three iniz commands are not really necessary t unless you want to reserve memory for each window^ as the 
system will allocate memory dynamically (as needed) to each window. 

The wcreate conimand will be loaded^ then /wl will have it's paramaters changed to an 30^24 text screen with 
a white foreground a blue background and blue border. Then wcreate will be unlinked and then loaded again for /w2. 
The changes to /w2 will be made then it will be unlinked and loaded again for /w3. 

Get the picture...... A lot of wasted time. 

There is a simple solutionT change the default parafTiaters of the windows in the boot file. To do this 
requires a little understanding of what paramaters need changing and where they are located, I will now endeavour 
to give you the (Tteans to obtain that understanding. 

Screen type code 

i = 40 * 24 te>;t screen 

2 = 30 * 24 te>a screen 

3 = not used 

4 = not used 
J = 640 * 192, 2-cGloi.r graphics 

6 = 320 * 192, 4-coiour graphics 

7 = 640 * 192t 4-cnIoar graphicb 
07 Cyan 8 = 320 le 192, i6-coinur graphics 

The codes above are the ones we require along with the start location of the window, this being the coUmtn 
and row of the first character space, Vou will also have to decide on the size of the window, do not get this 
confused with screen type, as you can have an 80 column text screen (screen type code 2) that is only 40 coluffms 
Wide. 

Now choose,.,. Screen type, Start location, i^indow size, ForegrQund, Background and Border colours. 
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Colou 


ir codes 


00 


White 


01 


Blue 


02 


Black 


03 


Green 


04 


Red 


05 


Yellow 


06 


Magenta 
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The ne>;t step is to see nthere these changes need to be made. Then tiie can look into how to fitake the changes. 
The list of nufTibers below is a dump of the Wl fiiodule supplied with ycujf systein disk. What ii.ie are looking for is to 
locate the bytes that need to be changed to produce the window we want when we boot 0S9. The byte for XUb nuiijber of 
cokmms is at $2c and you iifill find that the nuntber of coiuirms is $lb (27). The roiiis are at $2d which shows the 
number of rows at $0b (11). The screen type is located at $38 and is $01. The start location of the utindow can be 
found at $31 (colurrm) and $32 (row) and in the listing for Wl they Are both $08 indicating that the first character 
space is the top left hand corner of the screen. The only thing left is the colours, these are located at $33 
(foreground) which is $02 (blark)i $34 (background) which is $06 (white) and $35 (border) which is $04 (red). 

Addr 01 23 45 6 7 59 AB CD EF 2A68ACE 

0000 87CD 0043 0036 FlSl B000 3S00 3B03 07FF .M.C.6q.0.8. ;... 

0010 AHA 0000 0100 0101 0000 1S0S 180D 1E04 ! 

0020 0117 0305 0607 8000 0036 0000 1B0E 0101 6 

8030 0100 0002 0004 57B1 5343 C643 4333 49CF W1SCFCC3I0 

0040 7CD1 80 

Now to change this window descriptor to be the same as the one in the wcreate wl command in the listing of 
the startup file. A 60 column by 24 line te>;t screen with white lettering on a blue background with a blue border. 

0S9:load modpatch 
0S9:modpatch 

1 1 wl *links to the wl module in meniory 

c c 2c lb 50 *changes $2c from $lb (27) to $50 (30) coiurrin 

^2c lb 50 

c c 2d 0b IS *changes $2d from $0b (11) to $16 (24) rows 

002d 0b 18; 

c c 30 01 02 *changes $30 from $01 (48) to $02 (60) screen type 

0030 01 02 

c c 33 02 00 *changes $33 from $02 (black) to $00 (white) foreground 

0033 02 00 

c c 34 00 01 *changES $34 from $00 (white) to $01 (blue) background 

0034 00 01 

c c 35 04 01 *change5 $35 from $04 (red) to $01 (blue ) border 
V *to verify and update the modules CRC 

<controi><break> 

The Wl nK5dule in memory has now been changed. Any of the other window modules can be changed in the same way. You 
can now create a new system disk using cobbler or OSVgen, and eliminate those wcreate commands from your startup 
file. 

I hope this has made the configuring of windows a little clearer. A helpful hint that will save you a lot of 

hasslesT if you have booted 0S9 with wcreate in your startup file and they are the windows you want each time you 

boot up. A cobbler to a newly formatted disk will make the changes for you. Your startup file should then look like 
this.... 

Iniz r0 
set i me </l 
format /r0 </l 
shell i=/wU 
shell i=/\ii2^ 
shell i=/w7& 
dates 

Isn't this 3 lot neater than what we started with ?.... Happy computing. 

Rob Unsworth 
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HOW TO BECOME A MILLIONAIRE 

If I knew that I would be one [nyselfi don't you thirfk? 

But I can tell you this: The more money you are able to save over as long a period as possible at the highest 
possible interest rate, the greater is your chance of becoming a millionaire! But you knew that already » right"^ 
So what you (and I) really need to know is how to calculate Just how much and for how long^ etc to save. 

Or another situation: The Government is talking about us all providing our own old age pension in the form of 
Superannuation? but would you be better off just simply saving up your hard earned cash and control your own 
investment and save paying some Fund Manager (a company such as AMP Society) large fees. Of course* in that case 
iiou need a lot of self control so that you don't spend the money prematurely. 

The factors to consider are the following: How much money do you want to (and are you able to) save^' Since we 
live in times with constant inflation you should consider increasing your savings each year by at least the rate of 
reflation. Since you don't know what the inflation rate will be in the future^ you simply have to make a guess. 
Another factor is how high an interest you can get on your savings. In an ordinary savings account the interest 
rate is fairly low, so you might look for better investment accounts, but remember the general rule that the higher 
the potential return on your savings the higher the risk on the investment; in other words the less safe your 
.I'cneyi so you need to balance one against the other. Yet another factor is your marginal ta>; rate, ie the rate of 
td>; you pay on the top Dollar you earn. For instance, right now the highest tax rate in Australia is 477., but you 
may pay a lower rate, it depends on your income. Do remember that as your savings grow and your interest earnings 
grow with it, that may cause you to come into a higher tax bracket, even the top tax bracket. The final factor to 
consider is the length of the period of saving and for how long the money is left to earn interest before it is 
withdrawn. 

So I wrote a BASIC09 (excellent programming language that) program which I called SAVINGS CALCULATOR. Below is the 
program listing and a sample calculation. Type in the program and try out a number of different savings plans that 
suit your circumstances. I think you may be staggered by the potential of your savings. 

Disclaimer: I am NOT an accounting professional. This program may be helpful as a guide, but for professional 
advice please speak to an accounting professional. 

Happy computing! 

Your fellow CoCoNut, 

01 e Eskildsen 

*** S A V I N G S CALCULATOR*** 

Copyright (C) 19S?, all rights reserved, by Ole Eskildsen, li Monarch St, Kingston QLD 4114. Donated to the public 
domain for personal use only. The developer does not accept any liability as the result of using this program. If 
m doubt seek professional advice. This calculator helps you determine the result of different savings plans. First 
you enter the initial annual savings contributions, e.g. $100 per month = $1200 per annum. Then you enter the | 

percentage you intend increasing your savings by each following year. As a guideline you should at least increase | 

your savings by the expected inflation percentage. You at-e then asked to enter the expected annual interest rate i 

Nou expect to receive on your savings. Ne>;t, the marginal tax rdte^ which is the rate of tax at the top end of your | 

income bracked at which the interest earned on your savings will be taxed. And finally, for how many years do you | 

jsnt this savings plan to run? Try several different variations! If you have a printer you can also print the | 

result. I 

INITIAL ANNUAL CONTRIBUTION: 3600 j 

X INCR IN CONTRIB/YR: 10 ^ 

tST. INTEREST RATE: 13.5 i 

iARGINAL TAX RATE: 41 ; 
lERM IN YEARS: 20 
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PRINT? <Y/N): H 

mi ANN CONTRIE: 3600. I INC 10. 



INT RATE: 13.5 Ui I 41. TERM: 20. 



YEAR 


CONTRIB 


INTEREST 


TAX PAID 


ACCUMULATED 


1. 


3600.00 


436.00 


199.26 


3336.74 


2. 


3960.00 


1059.31 


434.32 


3471.73 


3. 


4356.00 


1731.74 


710.02 


13349.46 


4. 


4791.60 


2516.54 


1031.73 


20125.32 


5. 


5270.76 


3428.54 


1405.70 


27419.42 


h. 


5797. S4 


4484.33 


1S3S.58 


35363.01 


7. 


6377,62 


5702.49 


2338.02 


45605.10 


e. 


7015.38 


7103.76 


2912.54 


56311.70 


9. 


7716.92 


8711.36 


3571.66 


69663.32 


10. 


3436.61 


10551.19 


4325.99 


34332.14 


11. 


9337.47 


12652.15 


5187.33 


101184.33 


12. 


10271.22 


15046.51 


6169.07 


120333.03 


13. 


1129B.34 


17770.24 


7285.80 


142115.31 


14. 


12428.18 


20863.44 


8554.01 


166853.42 


15. 


13670.99 


24370.30 


9992.03 


194903.18 


16. 


15038.09 


28342.07 


11620.25 


226663.10 


17. 


16541.90 


32832,68 


13461.40 


262576.28 


18. 


18196.09 


37904.27 


15540.75 


303135.89 


19. 


20015.70 


43625.47 


17886.44 


348890.62 


20. 


22017.27 


50072.57 


20529.75 


400450.71 




206190.00 


329255.44 


134994.73 


400450.71 



PROCEDURE 
0000 
0001 
0014 
002D 
004B 
004C 
0037 



00CA 

010D 

014F 

013F 

0iCE 

01 FA 

0227 

022A 

0267 

0232 

02C5 

02C6 

02C7 

02CS 10 

02CC 

02D3 

0306 

0312 

0313 

034B 



savings 

REM PROGRAM: SAVINGS 

REM Date Written: 2 Dec 89 

REM ProgrannTier: Ole Eskildsen 

REM Copyright (C) 1989 by Oie Eskildsen, All Rights Reserved 

REM This prograiii has been donated to the public domain for personal 

REM use only. It may be freely used and shared with others for non- 

REM coffliTierciaii personal use provided no fee other than the cost of 

REM the niedia is charged and on the condition that this copyright 

REM notice is left intact. The developer does not accept any 

REM liability as a result of using this program. 

REM If in doubti seek professional assistance. 

REM 

REM Ole Eskildsen, 11 Monarch St, Kingston QLD 4114, Australia 

REM Telephone: (07) 209 4322 

REM 



DIM PRINTER:BYTE 

DIM AP,IR,TR,YR,IC,AC,TP,BJItTA,TTtANCNT:REAL 

DIM LINE:3TRING[60] 



AC=0 \TP=0 \B=0 
LINE=" 



\TA=S \TT=0 \ANCNT=0 
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i53SE 

i33BF 7l3 PRINT CHR$(12) 

0397 

0393 PRINT TAE(15); "*** SAVINGS CALCULATOR ***" 

03CD PRINT "^■ 

03D1 PRINT 'Copyright iC) 19S9, all rights reserved, by' 

0400 PRINT 'Ole Eskildsen, 11 Monarch St, Kingston QLD 4114.' 

0434 PRINT 'Donated to the public domain for personal use oniy,' 

046E PRINT "The developer does not accept any liability as the result of 

04AB PRINT "using this progradi. If in doubt seek professional advice." 

04E9 PRINT "This calculator helps you deteruane the result of different" 

0528 PRINT 'savings plans.' 

053A PRINT "First you enter the initial annual savings contributions," 

0577 PRINT "e.g. tl00 per month = $1200 per annu.ii." 

05 A 1 PRINT "Then you enter the percentage you intend increasing your " 

B5DE PRINT "savings by each following year. As a guideline you should " 

061E PRINT "at least increase your savings by the expected inflation " 

065B PRINT "percentage. You are then asked to enter the expected annual" 

0i9B PRINT 'interest rate you expect to receive on your savings." 

06D3 PRINT "Next, the Hiarginal tax rate, ujhich is the rate of tax at the" 

0713 PRINT 'top end of your income bracked at which the interest earned" 

0752 PRINT 'on your savings uiiil be taxed." 

0774 PRINT 'And finally, for houi many years do you want this savings plan" 

07E5 PRINT "to run? Try several different variations!" 

07E3 PRINT Mr you have a printer you can also print the result." 

0S1E 

031C 108 PRINT " 

0823 200 INPUT "INITIAL ANNUAL CONTRIBUTION: *,AP 

0S4B INPUT "A INCR IN CONTRIB/VRi ",IC 

0369 INPUT "EST. INTEREST RATE: MR 

0SS5 INPUT "MARGINAL TAX RATE: ",TR 

08A0 INPUT "TERM IN YEARS: %yR 

03E7 

0868 INPUT = PRINT-' (Y/N): ",P$ 

08CE IF P$="y" THEN 

0SDE P$=^V' 

68E3 END IF 

e3E5 IF ?%=''r THEN 

e3F2 INPUT ^MAKE PRINTER READY [ENTER]', R$ 

0915 OPEN SPRINTER, ■/P':yRITE 

0922 END IF 

0924 

0925 300 PRINT CHR$(12)', 

092E PRINT *INiT ANN CONTRIE: "; AP; " 1 IHC '^ IC; 

0958 PRINT " INT RATE: ^MR; " TAX X " ; TR; ' TERM: M VR 

e93A PRINT 

09SC PRINT ^YEAfi CONTRIE INTEREST TAX PAID " ; 

09C2 PRINT ^ ACCUMHULATED^ 

09D4 

09D5 320 IF P$<>''Y= THEN 500 

09EH 

89E9 PRINT SPRINTER, "INIT ANN CONTRIE: M AP; ^ I INC: ^ IC; 

0A19 PRINT SPRINTER,' INT RATE: M IR? ' TAX a '; TR; 

0A42 PRINT SPRINTER, ^ TERH: '', YR 

0A57 PRINT SPRINTER," " 

0A61 PRINT tPRINTER," YEAR CONTRIE INTEREST '; 

0A93 PRINT #PRINTER,^TAX PAID ACCUMHULATED" 

0AB3 

0AB4 500 FOR 1=1 TO YR 
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0AC9 aC=AC+AP 

0AD5 ANCNT=AP 

0ADD TP=TP^AP 

0AE9 E=AC*iR/100 

8AF9 TI=TI+B 

eB05 TA=E*TR/100 

0E15 TT=TT+TA 

0521 AC=ACtB-TA 

SE3i AP=AP+AP*IC/100 

0E45 PRINT USING "R^ 

0E54 PRINT USING «R15.2'^SANCNT; B; TA; AC 

0B6F 

0B70 720 IF P%=''r THEN 

0B33 PRINT #PRINTER USING "RA.S^M I; 

0B93 PRINT IIPRINTER USING "^R15.2'^%TP; B; TA; A( 

0EB2 END IF 

0BE4 NEXT I 

BBBF 

0BC0 1010 PRINT ' "; LINE 

0ECE PRINT -' ■; 

flED? PRINT USING "R15.2^%TP; TI; TT; AC 

0BF2 IF P$='Y' THEN 

0EFF PRINT #PRINTEK,'' ^; LINE 

0C0F PRINT SPRINTER/ '\ 

flClD PRINT #PRINTER USING ''R15.2^%TP; TI; TT; AC 

0C3C ENDIF 

0C3E 

0C3F 2000 INPUT "PRESS [ ENTER ]',AA$ 

0C57 IF P$="V" THEN 

0C64 CLOSE #PR INTER 

0C6A ENDIF 

0C6C 2200 END 
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Device Descriptor Query 

Geoff DongpB of Holt ACT. has sE-'ked a questicn about the descriptor "dd" he c3;T,e across where he eKpected that the 
correct descriptor shcuid have been '{©-". 

The foil owing 15 frorri the Microware 0S9 reference nianudl for the Color CofTtputer:- "Device Descriptors - TeriB, Ti, 
D0* and so on^ 5^9 device descriptors. These files describe the devices connected to the systefii. They contain 
device initialization data as well as code that directs 0S9 to the physical addresses of the ports to which devices 
are connected.' (End quote.) 

The descriptor 'dd" has a full name of "default descriptor' and is a floppy disk drive descriptor, as is d0T dl^ 
d2. The Microware Level 2 039 version for the Color Computer 3 is supplied uith a descriptor "dd" which is 
identical to "dS" apart froiTt the nafne. Therefore, a pathlist containing "dd" will access the drive "dO". Why two 
descriptors for the same drive? The logic behind this is that you fiiay wish to h&v9 some other drive as the 
"default drive*, for example "dT, in which case the "dd" descriptor would need to be the same as "dl". 

Some programmers use the descriptor "dd" in the program code. One example of this is Hulti-Vue, which includes the 
command "chd /dd" in the startup file, Multi-Vue also looks for its environment file (env.file) by the path 
/dd/sys/env.f lie. Now, if the descriptor "dd" is for drive 1 (drv=01), Multi-Vue should run from Drive 1 - well at 
least that is the idea of the "dd" descriptor. A user should be able to choose which drive to set up as the 
default drive and then run application programs without the need to make changes to the program. This, however, is 
not always the case. Let's go back to dulti-Vue for a Hioment. The Autoe>; £■ huitistart fiiodules of hulti-Vue dre 
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hard coded to d0, dQ/CMDS ixihich of course m\\ look at DrivH fur files uiithout regard for the default drive which 
IS noy set at dl (drive 1). As not all prograMiers foilny the convention as intended, the only options are to 
patch all nrodules which are hard coded for /dS, or to take the easy way out and have "dd" set for Drive y. This 
'3oes ifiPan that the Boot disk fTiiist be removed frofft /dS and the application prograffi run fro-:ri Drive 0. Nosif it does 
not iTiatter iTiuch if the prograiTt looks for files by a pathname beginning with 'dd' or 'd0\ 

The most cotrnTfon approach is to have exactly that configuration, le both 'dd' and 'dS' ar& set as Drive S, It is a 
gccfd idea to have this "dd" in the OSvEoot file so that fewer ERROR #22rs or ERROR iJ216's ^re encountered. 

It seems to fiie that the advantages to be gained from a default drive descriptor "dd' have largely been diminished 
by use of hard coded pathlists to a particular drive, usually "dS". 

rhu whichever may you choose to go, it must be remembered that 0S9 on the CcCo can ONLY boot from drive or hard 
drive. In the case of a hard drive, a 'dd' descriptor identical to the "HQ" device descriptor could be used and of 
course any hard coding of "dO' in programs running from the hard disk, tuculd need to be patched, 

•3ood programiTting should not include hard coding to 'd0% so do your bit to avoid it and your programs tidll be more 
flexible in the 0S9 environment. 

A better approach to "dd' default drive would be the use of dot or dot dot le, '.' \.' 

Each directory has two entries with names '.* and \.' (dot and dot dot). These entries contain the logical sector 
numbers of the directory and its parent directory respectively. This opens up a lot of possibilities. 

eg "dir ." will display the files of the current working (data) directory. 

"dir .." will display the files of the parent of the current working directory. 

"dir ,.,' will display the files one level higher ie the files of the parent of the parent. 

3o» instead of a pathname of "/dQ/ciftds' or Vdd/cmds' we could use "../cmds". The ',.' will be the parent of ChDS 
m this e>iantple, and will be the current working directory in most cases. Let's run Multi-Vue from drive /dl. 
Place the flulti-Vue disk in drive 1 and 'chd /dl;ch>: /dl/cmds". We would now e>;pect Nulti-Vue to be run from drive 
1, and it would if all hard code in the modules for 'd0" {i^^rG changed to ",.' 

CS9 does not seem to mind if the number of parent levels called for is too many. If you have not used "." or "..' 
then go ahead and give it a try with a few directory levels. Regards, Gordon Bentzen. 
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FURTHER THOUGHTS ON THE CAPABILITIES OF SHELLPLU52 

One of those things that I had put off until sometime in the future finally came back to mind the other day. I had 
always intended to explore the shellscript capacity of shellplus, but somehow I never got around to it, until 
recently. 

What I wanted was to be able to have a simple command to format my ramdisk. Simply put, instead of typing ... 
sformat /r9 r "RamDisk", 1 wanted to be able to type ... rf, or something similar and the Job would be accomplished 
for me by a shellscript. The following is what finally developed from that. 

I use 5di5k3, a copyrighted disk driver from D.P, Johnston, as my standard disk driver, and my formatter is called 
sformat. I normally use this driver, as it allows me to read, write and format disks in a number of other formats 
apart from Color Computer 0S9. The following shellscript is what finally developed: 

*ramdisk formatter 

prompt Format Ramdisk-' (y/n) : 

var.0 

if '^0=y 

display lb 22 SI 13 02 28 lA 05 04 
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display lb 22 01 15 03 24 12 05 02 

display lb 22 31 17 84 20 10 05 02 

sforniat /r0 r "RatTiDiBk" 

display lb 23 

display lb 23 

display lb 23 
Echo RaiTidisk ForiTiatted 
endif 
*er(d 

I guess I should try to explain nihat it does. 

First of alii you will need to have the following coirfiriands in your execution path: 

proiTfpt (simply a modified version of echo, but without a <CR> at the end of the string) 

display (a standard 0S9 coirnTiand) 

sforiTiat (special sdisk3 forifiatter) 

echo (a standard 0S9 coiTitrfand) 

You can of course, use the standard forinat command instead of stonTtat, but you will then have to alter the tfindow 
dimensions to allow for the differing outputs. 

I decided that 1 would incorporate it in my startup file. Consequently, 1 had to have the ability to choose 
whether I wanted it to do the format or not. Then I thought, well why not have the foririatter running in a wmdoy? 
Then, if I decide to reformat the ramdisk from a shell running under another process (edit for example), then at 
least the original contents of the screen are not destroyed. 

So, running through the scriptfile, firstly, we ask whether or not to continue with the format. The answer to this 
question is placed in the shellscript variable var.B. The variable is then tested. If the result is anything but 
yes, the script drops through the loop and exits without doing anything. 

If, however, the first character of var.0 is 'y', then the contents of the loop are executed. The loop creates a 
number of non-destructive overlay windows, and runs the formatter in the 'ready' mode, and sets the disk name to 
RamDisk. It then closes the windows sequentially, until they are all removed, and the finally writes the message 
'Ramdisk Formatted" onto the original screen. All from a simple shellscript! 

The great thing about shellscripts is of course, that they are, comparatively, quite small. They are very 
effective because they have the capacity to call, and string together a number of other commands. Because of the 
way in which Shellplu52 handles memory data modules, it is possible, if we provide a shellscript with the 
appropriate header and CRC, to actually load them into memory, and execute them from there, just like an executable 
file. What this really means, is that you could write a large number of shellscripts, and iTierge them together as 
one single file. Because of their small size, you could cram quite a lot of them into one 6K block of memory ... 
The ddtamod utility which is supplied with the 5hellplu52 programmes is the best way to accomplish this. 

Another example of creative hacking came to light the other day. I was examining the prompt setting facilities of 
Shellplus2, and I couldn't see any reason why I couldn't have my prompt a different colour from the rest of the 
output!' I thought that, if I could include an escape string (such as is used with the display command) to change 
the screen attributes, within the prompt, then it should be possible to have all sorts of modified prompts. How 
about a flashing prompt? Or underlined? It brings to mind all sorts of possibilities. 

Unfortunately, I have not as yet found a simple way to accomplish this. I am utorking on it. Let me describe my 
initial attempts. 

If you read the documentation that comes with 5heiiplus2, some details are provided of just where in the shell 
module, the prompt string is located. What I did was to save a copy of the shell to my ramdisk, and then use 
"zap", our public domain disk zapper to actually modify the area of shell where the prompt resides, using zap's 
disk modifying command. After writing the modified sector to the disk, and exiting from the zapper, I reverifyed 
the shell module, and then incorporated it in my merged shell file that is loaded from the commands directory on 
boot up. 
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Hey presto^ it worked" Nou.- I have a different coloured profi.ipt froiTi the reiDainder of the text. There are a fe'^s 
problems associated with this approach, but I will leave the.ii for you to explore. In the fneantiiTie, I aifi attempting 
to find a way to pass escape strings direct to the shell via the P= prompt setting facility of sheliplu52. I will 
keep you informed. 

Until thEHT keep on hacking. 

If you have any questions or comments^ please feel free to contact me on 
(07) 375-3236. Cheers, Don Berne. 



ooooooooooOOOOOOOOOOOooooooooooo 

Operating System Notes. 

Ever tried to use a Level I startup file under Level II? If, like some of us you suddenly found that your 
screen pause was not enabled, then read on. 

The normal arrangement for setting the page pause flag under Level I, was to use the line; 

Tmode.i pause 

This then set the global (under Level I) flag to on, and consequently, even when the startup file 
terminates, the page pause feature is still enabled. 

Under Level II, however, the system is 'purer" 039. The first thing that the system does is load grfdrv^ 
and then loads the merged shell file from the commands directory. It then looks for a startup file, and if fcsjnd 
tries to run it. However, it does this as a shell process. What this means is that if you include the above line 
in your startup file, the tirtode command processes as per normal, but tnhen the startup file terminates, all of the 
attributes that were set dissappear with the shell. If, however, you have started shells in any other windows frcBn 
the startup file^ then the pause attribute for those windows is enabiedll (Because they will inherit all the 
attributes of their parent shell). 

To successfully set the screen pause attribute from the startup file under Level II, you should use: 

Xmode /term pause 

Try it and see, 

ooooooooooOOOOOOOOOOoooooooooo 



COCO-LINK Magazine: Just a reminder for those interested in a wider section of CoCo systems. CoCo-Link is 
produced in South Australia and is well worth your support. Contact the Editor, Robbie Dalsell, on OS) 386 1647 or 
write; 

CoCo-Lmk 

31 Ned land Crescent, 
Pt. Noarkmga South, 
South Australia 5167 
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